@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu  } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED736 FREE SECTORS COPYING---D1:DIRECK.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 138ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u!"~ANSWERDBEEBSBENDI T}  PROGRAM BY RUSSELL A. GILL!!WRITTEN APR. THRU JULY 1981 A!U};@, 6-6-  " @""%@* @# 6-&$ V}6-+&,&@(-@26-+&,'@< P:,"6-%@F6-%@P Z  AW}d6-%+$Ae,n6-'@x P:,"6-%@z6-%@| " A 6-6-+&,&@X}-@ A  A 6-6-%+$Ae, "*" A6-%@Y}"@6-@ " A 6-6-@&" A@-@ AZ} 6-%@"@6-@ " A "@ A6-%@-6[}6@ A" ' A,%"@6-%@11%"@6-%@(6%"@6-\}%@1;%"@6-%@0E%"@6-%@1J%"@6-%@0O%"@6-]}%@1T%"@6-%@1Y%"@ 6-%@0^%"@6-%@1c%"@6-%^}@0h%"@6-%@1r$| 6- 6- "*"6-6-6-"*"_}A0 A 6-& 6-% +@0@@@ @,@/`}@@y,@@/AY@@',@ @9'/@ @A',@@8'/@a}@B',@@9'/@@A&',@$@8'/@$@B0',@)@9'/@)@Ab}:',@4@8'/@4@BD',@9@9'/@9@AN',@D@8'/@D@BX',c}@I@9'/@I@Ab',@T@8'/@T@Bl',@Y@9'/@Y@Av',@dd}@8'/@d@B',@i@9'/@i@A',@t@8'/@t@B',@y@9'e}/@y@A',@@8'/@@B',@@9'/@@A',@@8'/@f}@B',@@9'/@@A',A@8'/A@B',A @9'/A @Ag}',A@8'/A@B',A@9'/A@A',A$@8'/A$@B',Ah})@9'/A)@A',A4@8'/A4@B ',A9@9'/A9@A',AD@i}8'/AD@B ',AI@9'/AI@A*',AT@8'/AT@B4',AY@9'/j}AY@A>',@@u'/@@uH',@'/@R',@@'/@k}@\',@@'/@@f',@@'/@@p',@@ '/@@ l}z',@@%'/@@%',@@0'/@@0',@@5'/@@5',@m}@E'/@@E',@@P'/@@P',@@U'/@@U',@@`n}'/@@`',@@e'/@@e',@@p'/@@p @6-@o}++6-G:+'@#&P:'@#,,$A`,6-@@&P:$@9, ,-%@%@0++6-G:+'@p}#&P:'@#,,$A`,6-@@&P:$@9,$6-%@. /8 B @L6-@V++6-q}G:+'@(&P:'@(,,$A`,`6-@@&P:$@9,j ,t-%@%@0~++6-G:+'@(&P:'r}@(,,$A`,6-@@&P:$@9,6-%@ /  @6-@++6-G:+'@3s}&P:'@3,,$A`,6-@@&P:$@9, ,-%@%@0++6-G:+'@3&P:'@3,,$At}`,6-@@&P:$@9,6-%@  /  "@  JANUARY 19 "@  FEBUARu}Y 19"@ MARCH 19#"@ APRIL 19("@ MAY 19-"@ JUNE 192v}"@ JULY 197"@  AUGUST 19<""@ "  SEPTEMBER 19A "@  OCTOBER 19w}F!"@!  NOVEMBER 19K!"@!  DECEMBER 19,@0@C/@(@C/@(@Dx}/@)@E/@0@F/@)@G/@(@G,@R@C/@R@Gy},@T@C/@V@C/@V@G/@T@G/@T@C",@w@z}C,/@w@G6,@@C@/@y@CJ/@y@DT/@@E^/@{}@Fh/@@Gr/@y@G|,A@C/A@C/A@D/A|}@E/A@E/A@G/A@G,A@C/A@C/A}}@G/A@G/A@C,A&@C/A'@C/A(@D/A'~}@E/A&@E&/A&@G0/A(@G:,A2@CD/A0@CN/A0}@DX/A1@Eb/A2@Fl/A1@Gv/A0@G,AP@C/AS}@C/AS@G/AP@G,AQ@E/AS@E,AU@C/A}W@C/AW@G/AU@G/AU@C%% RED=PHYSICAL GREEN=EMOTIONAL,, $BLUE=}INTELLECTUAL hit SPACE to cont ##@@K:)@ @* A"P4n +@'0}@A0@@L(@n(@ PERSONAL BIORYTHM 7Z(@/(@ W}HAT IS YOUR :(@Z(@ BIRTHDAY? 80(@0(@*** month ***>C ( ( }(EO!@) @$(@E(@ WHAT month IS THATO A!H0(@0(@*** day }***RW ( ( (YO!@1) @$(@E(@ WHAT day IS THATO A!0\0(@0(@}*** year ***fk ( ( (mO!@) @$(@E(@ WHAT year IS THATO A!Pp}n +@'0@A0@@L(@n(@ PERSONAL BIORYTHM z(@/(}@ FOR WHAT month DO :(@Z(@ YOU WANT YOUR e(@(@ PERSONAL BIORYTHM} ( ( (O!@) @$(@E(@ WHAT month IS THATO A!0(@0(@ FOR WH}AT year  ( ( (S!@) @)!((@I(@ WHAT year IS THATS A"$'} +'0@G,($WOULD YOU LIKE TO SEE ANOTHER MONTH C(AND/OR YEAR (Y/N)?G 4Y A!`} @' +'0@ D2:BIORHYTMH C(AND/OR YEAR (Y/N)?G 4Y A!`M\]&'QKCIRCOLDCOLORRFVWPARHORDIVERANPRERUSCRD1RD1XYXYCIRCLE@@ }@@@  } ! }"#$%;@, A9@3<@,++9@0<@,9@0<@ },&&;@,9@0,9@0,<;@,$6-@"'@<6-+'@,'@ A A }$ Ap $$6-+H:,$@,%@0@0@0@@ }(}(--(%---(%àϠ͠РՠԠŠҠӠӠɠӠԠŠĠ.--(% }/--(%ĠŠӠɠǠΠ2--(%4$d6-H: },$@n+@%@x0@0@@0@@ @$ } A-@6-+AP'+&@,,68<@,-A$$68<@,-++$,&,%@!68 }<@,-8<@,68<@,-8<@, $,-@@'',8<@,&@@8<@,J } O',A`'/A`AP AT++,8@<@,8@<@,h-@r/8 }<@,8<@,| "T:,"" A6-R:,@,F:B2y,"@*!@*! }6 Ap@ A **F:B2y,"@* @A6"F:B2y,"@* @,+6 A,F: }B2y,"@"+, A"@A="@368<@,-8<@,&@= A= }"@368<@,-8<@,%@= A="@368<@,-8<@,&@= A=" }@368<@,-8<@,%@= Aa"@368<@,-8<@,%@W68<@,-8<@ },&@a Aa"@368<@,-8<@,%@W68<@,-8<@,%@a Aa }"@ 368<@,-8<@,&@W68<@,-8<@,%@a Aa"@368<@,- }8<@,&@W68<@,-8<@,&@a A AX6-%@b"%@ Al }6-&@v"6- @',A0'/A0A @,A08<@ },$= @,A01/A0A=6-@1,A@'/A@A1@- }@(,A@8<@, ( A  E8<@,$ A;68<@,-@E A%E }8<@,A$ A;68<@,-AE A*E8<@,A`$ A;68<@,-AaE  }A4E8<@,A$ A;68<@,-AE A9#"@ AP# A> " A }@ AC! A@ AP! AH) @),8<@,8<@,I///8&@<@,8&@ }<@,L) @),8<@,8<@,M2//8&@<@,8&@<@,2$R) @),8<@ },8<@,S///8%@<@,8%@<@,V) @),8<@,8<@,W2//8%@<@ },8%@<@,2$z68<@,-8<@,)68<@,-8<@,) A A A@ } A0-@TT,A`%+8<@,&A`,$8@<@,8,%8,$8@<@,-@ }@3N36-A`%+8<@,&A`,$8<@,N6-8,%8,$8<@,/ )!A%6-@ }/ A !"@,!6- /   6-+@$,'-+@$,& 6- }G:,6-E:,-@&@6-8<@,&A`$$6-8%@<@,&A`8#6-A`%$#6 }-8,%8,$B36-A`%$36-8%@,%8%@,$L 6-V!A6-A` }6-j!A6-At ,~ /    AP T:,"@A }+ @0( (0(" Construction lines Р-(-(" Change veiwing angle Π-(-(" } Go to drawing page Ԡ-(-(" Begin new design Ԡ-(-(" Draw current design Š- }(-(" Help Π1( (1(" ŠˠϠԠ6-R:, F:B2y," }@B@A T:,"A@ AP-"@*!@# @- AP }-"@*!@# @- A`(P"R:,"@*!@, A26-< A`F ApP A5 }2"@A< APF0( ( (0( Number of lines in currentJ ( ( design is .L/( } ( (!( Change to %/ AN AP.( ( (.( Angle of veiw in currentR(((( design is }  degrees.T!( ( (!( Change to V A0 AxP @(((<( Do you want a new des }ign (Y/N)@P4NA @ @Z(+( How many construction circles/; @>(P( MI }NUMUM 2!...Z A 6-@ A A @AP# @ @# AP# }@ @# A`#!@ Ap# A  AP -@ 6-@& g8<@ }, @36-@&8<@,C6-P:$G:$,,]68,-8<@,%+&,g A1 F6-8<@,&@,6-P:$G }:$,,F68,-8<@,&+&,  & $-@6-8<@,&A`68,-P:$G:$,, $ }%%2@@@-@@-@@ %%2@@ @@ }-@@ %%2@@0@@ %%2%%2@ }$X%%2@@@b%%2@@@@l-@@ }=%%2>%%2@?$@>8<@,!A168<@,-A }; A>$J>8<@, 168<@,-@; A>$T>8<@,!A168<@,-A }; A>$(#%%2A@@2#%%2@A@@<#-@@ F#%%2 }P#%%2@Z#$#-@@3#6-%? #+68<@ },-E:,+68<@,-G:,$   $% @6-&%7-@@7((C) SAM SMALL AUG 1983 (V.2)0%2 }-@@2(:%$' @'(([1] CLOAD and RUN.$'([2] MENU displayed..'G }G(?[3] All functions are locked out except 'new design'.8' ([4] Select 'new design'.B'<<(4[5] 'New design Y/ }N' is displayed for checking.L'MM(E[6] Program creates COS and SIN arrays for faster circle drawing.V'ee(][7] Se }lect how many construction circles are required [minimum of 2 required].`'([8] Return to MENU.j'**("[9] } Drawing page is now available.t',(,( ӠΧϠy' F:B2y,@B~' @' }(([10] DRAWING PAGE'G(G(< Select which segment to be drawn with fire button.'Q(Q(F Joystick will t }hen 'rubber band' drawing line to the desired'``(X profile. All eight directions are supported and there are }limit checks.'d(d(Y then draws design if other parameters have been entered.'( }((( goes back to MENU',(,( ӠΧϠ' F:B2y,@B'$ BP }$TO PAGE ILLUSTRATION' @'(([11] MAIN MENU'n(n(b Attempting to 'draw current design' wi }thout entering other parameters '(will result in (..(& program asking for these entries. (o(o( }c 'Draw current design' will draw three-dimentional representation of ((drawn profile. }(2( ( (2( ӠΧϠ#( F:B2y,@Bu(( @2( ( ( ( ([12] PARAMETERS }<(P(P(E 'Construction lines' Any number from 1 upwards.F(n(n(c 'Angle of veiw' } 0 deg - eye level, 90 deg - overhead.P(:-@@ :( ӠΧҠΠd }( F:B2y,@B@n( A:DRAWING PAGE: @:,,($ :,,( }$ | :,,($ -double dot in|dicates end of line:,,($ that Joystick| can move }:--(%  .. |   :,,($ |the moveable  :,,($ |drawing lin }e  :,,($ |represents  :,,($ |circle diameter ;,,($ |loca }tion  ;,,($ |  ;--(%  . |   $;++(# } |  .;,,($  . |   8;,,($ -single dot in|dicates a fixed B;--(% posi }tion at r|espective circles `;,(,( ӠΧϠj; F:B2y,@BRt;$ D2:CA }D.BASt r|espective circles `;,(,( ӠΧϠj; F:B2y,@BRt;$ D2:CA @\] XASUTOTANPOLINU @0@@HAP@@"wf @@ } BCALCULATOR SIMULATOR;@,;@,##@@K:AR@} ' +'0@ AR@--(%--(%WALLAC}E DUVALL'S | --(% ɠ | 0 --(% Ҡ | --}(% Ҡ --(% --(% } --(% Π Π Ǡ --(% --(% } --(% --(% Ӡ ؠ  --(% } ؠ !--(% "--(% #--(% } ؂ ؠ $--(% %--(% }&--(% ͠ ̠ '--(% С (--(% } )--(% *--(% 2#7\ @@}@&1@@O( S\6-A:,8I@@&'@@E( } I(9 6-< A"F"@@"(<G[!2%@@5-}@@9 [2P)@QAdAUU "A'(  @`Z}"AU [C"AX#&@'@3@9( C @`_ @de\ A@}@&1@@O( S\6-A:,nL@@&'@@E( }I(L$xL@@&'@@E( I(L$ A AdA}U F:Ad,AUA A A 6-%.@@!( $'. @p8 } A @%@+( .'8 @p A AdAU F:Ad,AUAp A}b A 6-&".@@!( $'. @p, A -AdAU. F:Ad,}AUA / A5 A6 6-$@.@@!( $'. @p^ A _Ad}AU` F:Ad,AUAYa ARg Ah 6-'r.@@!( $'. @p}# 6-G:, A '# @p# 6-E:, A '# @p*6-+&, A  '* @p7 6-%}@@ /@@7(͠"Au' @p 7 6-&@@ /@@}7(͠"Au' @p&S@@&'@@F( I'S }@p?H6-!@@ 3@@;( >'H @pX# 6-8, A '# @pq# 6-M:,} A '# @p# 6-O:, A '# @p' A # 6-K:, A '# @p$ 6-+$, }A '$ @p:6-+'A,#6-+'A,- A0': @pg6-6--@@&?}@@P( 0 Z A]'g @p#-@@  "@@}( :@@%'@@:(WHICH FUNCTION\ A Q@@&1@@O( } S\6-A:,I@@&'@@E( I(  +$@},%A!>+ (}(MEMORY +%(________((+(?pp(h THIS FUNCTION STORES THE TOTAL AMOUNT CALCULATED (NOT NECE}SSARILY THEAMOUNT DISPLAYED) IN MEMORY.@l(i(^THE LETTER ͠ WILL APPEAR TO THE LEFTOF THE DISPLAY WINDOW WHEN THERE IS } A VALUE IN MEMORY.l(AB(B(7 USE FUNCTION M= TO DISPLAY AMOUNT IN MEMORY.B A)H+ (}(MEMORY -}%(________((+(Iff(] THIS FUNCTION SUBTRACTS THE TOTALCALCULATED AMOUNT (NOT NECESSARILY THEAMOUNT DISPLAYED)Jo}( FROM MEMORY.(o(QTHE LETTER ͠ WILL APPEAR TO THE LEFTOF THE DISPLAY WINDOW WHEN THERE IS A VALUEKG( IN MEMORY}.(=("USE FUNCTION M= TO DISPLAY MEMORY.G A)R+ (}(MEMORY =%(________((+(Shh(` THIS FUNCTION DI}SPLAYS THE TOTAL OF THE AMOUNTS ADDED TO AND/OR SUB- TRACTED FROM MEMORY.TF(<(1NOTE: THIS FUNCTION DOES NOT CLEAR T}HE MEMORY.F A)\3 (}( MEMORY CLEAR-( ____________0(3(]JG(? THIS FUNCTION CLEARS THE MEMORY OF ALL V}ALUES (MEMORY=0).J(^jj(bTHIS FUNCTION DOES NOT CLEAR THE CURRENT WORKING VALUES, ONLY THE MEMORY WILL BE CLEARE}D_ A)f' (}(SIN(X)!(______$('(ghb(Z THIS FUNCTION CALCULATES AND DISPLAYS THE SIN VALUE OF }THE CURRENT WORKING TOTAL.e(h(h A)p' (}(COS(X)!(______$('(qhb(Z THIS FUNCTION CALCULATES AND} DISPLAYS THE COS VALUE OF THE CURRENT WORKING TOTAL.e(h(r A)z! (}(+/-(___(!({@@(8 THI}S FUNCTION CHANGES THE SIGN OFTHE CURRENT TOTAL.|O((EXAMPLE:()(-5 BECOMES 5,(?(26 BECOMES -26B(E(O A) }- (}( ALL CLEAR'( _________*(-(SS(K THIS FUNCTION CLEARS THE WORKING TOTAL. IT DOES NOT CLEAR THE ME }MORY.a(T(IYOU MUST INPUT A NEW STARTING VALUE AFTER USING THE ALL CLEAR FUNCTION.W(a A)' (}(TAN(X)! }(______$('(hb(Z THIS FUNCTION CALCULATES AND DISPLAYS THE TAN VALUE OF THE CURRENT WORKING TOTAL.e(h(  } A)1 (}( SQUARE ROOT+( ___________.(1(gg(_ THIS FUNCTION CALCULATES AND DISPLAYS THE SQUARE RO }OT OF THE CUR- RENT WORKING TOTAL.G(:(/THE OPPOSITE OF THIS FUNCTION IS X^2 (SQUARE).=(G A)7 (}(ABSO}LUTE VALUE1(______________4(7(TT(L THIS FUNCTION DISPLAYS THE POSITIVE DISTANCE FROM ZERO OF A VALUEK>}(6THIS FUNCTION WILL ALWAYS DISPLAY A POSITIVE NUMBER.A(K A)%' (}(LOG(X)!(______$('(hb(Z } THIS FUNCTION CALCULATES AND DISPLAYS THE LOG VALUE OF THE CURRENT WORKING TOTAL.e(h( A)- (}( SQU}ARE(X)'( _________*(-([[(S THIS FUNCTION MULTIPLIES THE VALUE BY ITSELF AND DISPLAYS THE RESULT.(} ( A)) (}(PERCENT#(_______&()(cc([ THIS FUNCTION ONLY WORKS PROPERLYWHEN USING IT IN CONJUNCTI}ON WITH MULTIPLICATION.((EXAMPLE:(-*("100 X 10 % = 10 CORRECT USAGE-(**("100 + 10 % =100.1 INCO}RRECT USAGE( ( A)' (}(EQUALS!(______$('(ll(d THIS FUNCTION DISPLAYS THE TOTAL OF ALL CAL}CULATIONS THAT HAVE BEEN DONE. (EXCLUDING MEMORY)( ( A)# (}(PLUS(____ (#(EE(= THIS F}UNCTION ADDS FOLLOWING INPUT TO CURRENT TOTAL.( ( A)% (}(MINUS(_____"(%(KK(C THIS F}UNCTION SUBTRACTS FOLLOW- ING INPUT FROM CURRENT TOTAL.( ( A)+ (}(MULTIPLY%(________((+(PP(}H THIS FUNCTION MULTIPLIES CURRENT TOTAL BY VALUE OF FOLLOWING INPUT.( ( A)' (}(DIVIDE!(______}$('(PP(H THIS FUNCTION DIVIDES CURRENT TOTAL BY VALUE OF FOLLOWING INPUT.( ( A) .('(HIT TO START AGAIN+.%'.@@!( $#. @`'9,7,500,10000'9,11,525,10001'9,15,550},10002'9,19,575,10003'16,7,400,10004'16,11,420,10005'16,15,440,10006'16,19,1000,10007'23,7,600,}10008'23,11,625,10009'23,15,650,10010'23,19,675,10011'30,7,700,10012'30,11,725,10013'30,15,750,}10014'30,19,250,10015 '37,7,200,10016!'37,11,260,10017"'37,15,300,10018#'37,19,350,10019 D:CALCUL}AT.OR1 "37,15,300,10018#'37,19,350,10019 D:CALCULF CALCULATOR SIMULATOR ____________________ INSTRUCTIONS ------------ This progr }am will simulate a pocket calculator. The simulated calculator will be easiest to use if you simply think of it as a !} regular everyday calculator. To start, RUN the Basic program file "CALCULAT.BAS". A screen resembling a pocket calcul"}ator will appear and will be awaiting your input (starting value to which you will perform your operations). Simply t#}ype your value and press . A small arrow will appear next to the box in the upper left corner marked "M+". U$}se the [TAB] key to move the arrow to the desired operation (+,-,%,etc...). When the arrow is next to the operation wh%}ich you wish to perform, press . Now, input your second value and press (See, it's just like a re&}gular calculator!). After entering your second value you may tab over to the [EQUALS] box and hit which will d'}isplay the total, or you may continue to perform more consecutive operations if you desire. Now isn't that easy? It(} might seem a little strange at first, but once you get the hang of it, it really works quite well. E)}XAMPLE ------- Try this simple example... 1.) Run the program. 2.) enter 10 as the start value *} 3.) [TAB] over to +. HINT...if you tab too far, [SHIFT]/[TAB] will make the arrow move backwards. 4.) enter 10+}. 5.) [TAB] over to EQUALS. 6.) press 7.) the number 20 will be displayed. Try some proble,}ms of your own to get the hang of it. If you get stuck, [TAB] over to the "HELP" box and press . Enter the -}number of the item you need help with and a "HELP" screen will instantly appear. ENJOY! W. Duvall Enter the qfffffff>`<|fl0fF3f< p88pf< 80 0 ~~`0 0`<0}f >cc6w``nf>ff~fff~~f<flxxlf`````~cwkccfv~~nf1}}9:;<=>?@ABCDEFG?}HIJKLMNOPQRST !!ԠҠ@}Ġқ BY R.CONSTAN, 1984 ANALOG COMPUTING  BPR+ -3(SYSTEM INITIALIZATIOA}N9-R(ŠԠ BQ+0 AРϠՠ12!!˯Ġś31F:B}Ad,*( A 1Šś4Ad6 6-T:,*(T:,6-7" @Q6-R:," %@P9 C}-6-%+ ,$= -6-&+!,$? -6-%+ ,$@ -6-&+!,$AFAU+(F:AU,,$<2@D}u&$F:AU,$F @QB%%ĠĠϠӠśd##ԠҠΛn+s" BQ@E}"ˠ̠ӛx 00@z 6-6- 6-6-6-6-AdҠț,!F}!àŠǠӛ1 -( ԠӮ66.6-ԛ@< @PAU-2@VG}&$<ԠĠE )(6-G:, AuIBBˠԠӮĠԠŠƠέŠӮJH 1H}-'@2*A`46-?:<<,H"@A h( A1% 6.>:,(ԛl6-?:<<,p6I}7<,.7&,|' A1& 6.>:,'ԛ6-?:<<,67<,.7&,( A 1% 6.>:,(J}כ6-?:<<,67<,.7&,( A@1& 6.>:,(ś6-?:<<,67<,.7&,GAUK}@.*@AUGԠŠҠ 2&67&<&,.&Ԡě< 1-L})")"A`AP<ԠΛ&6-?:<<,"@& A 6-&-!7%<%,4!6M}7<,. !!נĠԠҠȡ6-?:<:,%@' 6-6--(' A&&********************************O}%%Ԡנ٠ӛ -1+",*++ ,)+",,!6.|'6-1 A@ 1+",*++!,)+",,!6.P}|'6-1 A@'+",*++ ,)+",,!6.'6-'+",*++!,)+",,!6.'6- - ( 8, &Q} -( 6-6-0 @RDҠӛE2(v|twu| 6-%(6-%2 AF2(v|R}txu| 6-%(6-%2 AG6(  6-%,6-%@6 AH6(  6-%,6S}-%@6 AI8(  6-%.6-%@8 AJ8(  6-%.6-%@8 T}AN, )"@6-"6-, A'QS 6-6- @RXàŠӛY(  A ZU}(   A [(  A \(   A l< 6-%6-%)&"@s,6-26-V}< A&q 6-6- @RΠ՛ BQ@@+ 000#0+00 (W}}%@p %(%0%TT(L CIRCUIT DATABASE ____________________ ҮΠX}6 -6(() --(-%() $6 -6((Y}.0 --( 1-----------DRAW NEW CIRCUIT0(3/,($ 2-----------VIEW PREVIOUS CIRCUIT/(81.Z}(& 3-----------DISK CIRCUIT DIRECTORY1(BHB(6 4-----------RETURN TO PRESENTCIRCUIT FOR EDITINGE(H(G''([} *** ENTER SELECTION ***HT (,( NOTE: WHEN IN DRAWING MODE,T(# PRESS [] FOR Р!K -\}(L )!AdVJ"+ @I,)+!@R&+(,,.2&66-#@2J A`6-&@H]}!Ae 6.D:jK -1("ENTER CIRCUIT NAME: [ ]C-@%@!K( l -o )^}"AUApp+",*+AU,A5r !Ad A5t>+"A&,*+!, ( (6-&467_}%,.> A5yaE+"@F,)++!@G,*+ @X,,)++!@d,*+ @,,W67%<%,.>:,a A`~,2&`}6-G:,"2, A5-@$%(>:, "AU AP#@'+3A a}?AKAU BQ@0 6-6-%6-! Ab+6-%&0! AP!6-?:<% B(op qrs$6-%,6-%26-86-B @RL }ҠכM  6- 6.d N  6.c T ŠכU  6-"6.g V  "6.h W  "}6.f X  "6.e \  6- @Rl Ġכm  "(` @Rn @Rt Р}Λu ) -()6-?:<($[CTRL] , THEN [ESC], FOR MAIN MENU!A(I-(}%PRESS ANY KEY TO RETURN TO EDIT MODE 4)@ARF(}I$ BԠś?AU2-'}(-?6-?:<:,I6-%1+!AU,*+ A`},)Ad16-&1+!@',*+ @2,%(>:,1 AP% APP6-&+!, AP@6-%+ ,} AP@6-&+!, AP@6-%+ , AP@ -(O+"A&,)+"AT,)6-&+,/-7}( C"ATOAd"@' AR?"A%)"AS16-?:<A `<ΠΠԛ>Q%6-F:@,%F:}@,$AV/ B``4BP:Q(A>:,>.-%@9.(K>:A,>:,>=-%A}66-"6-1F:,!A'76-=6->&6-O:F:,&,&6-F:AV,$%$>K-%6*O:&F:,,# ' ,(0} @(@@K@> B$D2:CIRCUIT.BASV,$%$>K-%6*O:&F:,,# ' ,(0D>>EDEIEACDCICAADIFCASEASELASCLASETOCTOCATOEATODONIIXPROMPIPIYDTDECNDCCNINPTXI!}ENIBDTETOTPA1@@@@@ !} !} !"#$%&'()*"INVE!}ST" by TOM LEWRYA +'0@@@A0@@@ 9A,;A@,9A,9A!},;A@,9A,;@,;@,;@ ,;@,;A,;A,*;@,9@,*6.!} / / .( (.( CAPITAL AND EXPENSE PROGRAM((( ------- --- ------- -------#( by TOM LEW!}RY(##@@K:2K6-6-'6-36-?6-K6-<F67@!},. %67A@,. 467@,.:6.@6.F6.A AFk6-6-8,,68,-8%@,=68%@!},-F6-8,Z68,-8%@,k68%@,-Kk#6-+&@,$@ %@16-$@ :6.7,P67<,.7%!}@ ,k67%@ <%@ ,.M:6-%@6.7<,,67<,.7<,767<,.:$Pk6-6-8,,68,-!}8%@,=68%@,-F6-8,Z68,-8%@,k68%@,-Uk#6-+&@,$@ %@16-$@ :!}6.7,P67<,.7%@ ,k67%@ <%@ ,.W:6-%@6.7<,,67<,.7<,767<,.:$d$$--ENT!}RIES FROM TAPE OR DISK?--iX( (B(3Do you want to work on entries you made earlier?O)@X6.>:,n(4!}NAx0YAz?((From Tape or Disk?+)@?"AUA| 6.>:,( 4TA2!}~0DA"AR(bb(YType in one of these data file names: EXPOAKyr,EXPINVyr,INCOAKyr or INCINV!}yr(yr=80,81...)4A"S67@,.,67@<@,.D:I@@S A@q!}( (q(cPosition tape to beginning of data, push PLAY on the recorder, then hit RETURN on the keyboard.##@!}@C: A?6-8,!6-8,06-8,?6-8,@--PRINT CH!}OICES--70@@@70@@@jAR(}(T(0Add, Change, Display, Print,!} or Stop/Save:a)@j6.>:,++0A*0D*0C*0P*0SAb 4S(S ApAR!}@4DA4CA4PA--ADD ENTRIES--I0@@@70@!}@ @IAR3 (} (3(" ADD ENTRIES (to stop, type 'S')!-@@!(DATE: 6!}-@-@;)@"@& A`0 AP;--SORT--#"A& AQ# AP!} (>:,- @H)!@X# AP- AP68,-A:>:,,."@)"@ (-.6-%@!}6-%@ h-@@:( Enter a description of the item.U(Limit 20 characters Yh4A`!}^-@@.(Expense or Capital:;)@D6.>:,H(^0E*0CAp: A-@@!}6(Enter the amount :" B$B-@@,(Mark this entry? 9)@B6.>:,&0Y*0NA!},4CAP6b"A:(&You have the maximum number of expenseb(#entries. You must delete one first7!}1"A#-@A' 1 A;6-%@@tt68,-8@,$B%8@,$B%8,$A!}%8@,$A%8@,$@%8@,JI067+&@,$@ %@<$@ ,.968,-A6-%I6-!}%O 4Y67<,.* 6-&T A^b"A:(&You have the maximum number of capitalb(#entries. You m!}ust delete one first_1"A#-@A' 1 Ah6-%@rtt68,-8@,$B%8@!},$B%8,$A%8@,$A%8@,$@%8@,|I067+&@,$@ %@<$@ ,.!}968,-A6-%I6-% 4Y67<,.* 6-& A--DISPLAY--6-6-@6-@!}I0@@@70@@@IAR@h (}'(EXPENSES (Total = $)9-@0!}h(p. of P:+&@,'@,%@3-@@3((Unmarked total = $)?"(!}()( No expenses.56-? A@-@@@(&DATE ITEM AMOUNTA-@@!}A('-------- -------------------- -------6-%@!6- -6-&@$+&@,<6!}.=:8,, A!<6.7+&@,$@ %@,<-@%@)( 7<,26-8,< AP !}"@AhAR'-@@"R(%Forward, Back, Capital, Page or Stop?_)@h6.>:,!}++0F*0B*0C*0S*0PAAR@4CAP4SAPB4F*"(.(Thi!}s is the last page.8 BPB AI4B*"@(5(This is the first page.? BPI A1 4F!}6-%@'6-%@1 A1 4B6-&@'6-&@1 AS 4P(}S(Enter page numb!}er (1 - P:+&@,'@,%@)5'6-+&@,$@%@5A9(( No page # +-!}@A/ 9 A5!--CAPITAL ITEMS--&a6-@6-@50@@@O0@@!}@aAR@0g (}&(CAPITAL (Total = $)8-@0g(p. of P:+&@,'@,%@!}23-@@3((Unmarked total = $)5D"((.( No capital items.:6-D A`:@!}-@@@(&DATE ITEM AMOUNTDA-@@A('-------- -------------------- -------!}N6-%@!6-X -]6-&@$+&@,v<6.=:8,, A!<6.7+&@,$@ %@!},<-@%@)( 7<,26-8,< AP "@AiAR'-@!}@"S(&Forward, Back, Expenses, Page or Stop?`)@i6.>:,++0F*0B*0E*0S*0PAeA!}R@4SAP4EAB4F*"(.(This is the last page.8 BPB A`I4!}B*"@(5(This is the first page.? BPI A`1 4F6-%@'6-%@1 A`1 4B!}6-&@'6-&@1 A`W 4P(}((W(Enter page number (1 - P:+%@,'@,%@)!}5'6-+&@,$@%@5A`9(( No page # +-@A/ 9 A--FORMATS!} FOR AMOUNTS--5 "P:,(-@7&B:=:,,%@2(.005$C$@"P:$@,8-@9&B:=:,,%@@!}(0C$&-@@&B:=:,,%@#(&$$$--PROMPTS FOR DELETE ROUTINE-- I0@@@70@@!}@IAR@ lAR'-@@#V()Fwd, Bck, Cap, Mark, Pg, Rmv, Stop: c)@!}l6.>:,770F*0B*0C*0M*0P*0R*0SAAR@4PA54F)4!}BA$I0@@@70@@@IAR@lAR'-@@#!}V()Fwd, Bck, Exp, Mark, Pg, Rmv, Stop: c)@l6.>:,770F*0B*0E*0M*0P*0R*0SA!}AR@4PA4F)4BA$--DELETE-- 6-6-%6-@!} A*4CA, 4M6.E A /4SAP4T-@@"?(%Position cursor a!}nd hit 'R' T(Hit 'S' to stop970@@@70@@@>!6-@!AR!}H,-@ ( #)@,6.>:,R%%0*0*0R*0SA@W 4S A A\-4!}*!@#6-&@- A@f-4* @!#6-%@- A@p0RA@u!6-&@%!!!}A@z+68,-B 6-%@+6-&8,-@(99/99/991-@!@#() 16-%@!}7<,4*A@56-&8, -@%@+() 5 A@--CAPITAL ITEMS--6-@ A!}P4EA 4M6.C A 4SAPT-@@"?(%Position cursor and hit 'R' !} T(Hit 'S' to stop70@@@70@@@!6-@!AR,-!}@ ( #)@,6.>:,%%0*0*0R*0SA@ 4S A A$-4*!@!}#6-&@- A@.-4* @!#6-%@- A@80RA@=!6-&@%!!A@B!}+68,-B 6-%@+6-&8,L-@(99/99/99V1-@ @#() 16-%@`!}7<,4*A@j56-&8, -@%@+() 5 A@~ A`--SORT-- 6-&6-& AP!}--LOAD--;@0,A@*6-A:7@<@,,A6-A:7@:,("AUA, 4N"(@>:@,, AP0DA(@!}>:@,h-@@Z(?How many entries per page? (Hit for a continuous listing)d AhZ-@"}@9(Do you wish to print EXPENSES?F)@Z"AUA 6.>:,4NA0YA"}R% B6-@%6-@@ (}-@@6(EXPENSE ITEMS, page @ AP%"6-"}@% A 6-P:+&@,',%@<<(@ p. of W*(@"}EXPENSES (Total = $)W(@ (Unmarked total = $)M"(@%(@C(@ "} No expenses.M A` 6-%!6-+ A -!6.=:8,,+ A!T&6.7+&@,$@ %@"},A(@ 7<,J6-8,T A3  6-%@)6-%@3 Ap0(@(@"}$(@*"06-@_-@@>(#Do you wish to print CAPITAL ITEMS?K)@_"AUAA 6."}>:,4NAB0YAEX6-@6-@!(}3-@@N(CAPITAL ITEMS, page X AP"}G%"6-@% A H 6-P:+&@,',%@I<<(@ p." } of JV)(@CAPITAL (Total = $)V(@ (Unmarked total = $)TR"(@%(@" }H(@ No capital items.R A^ 6-%!6-h+ A -!6.=:8,,+ A!rT&6.7" }+&@,$@ %@,A(@ 7<,J6-8,T A|3  6-%@)6-%@3 A" }2@(0@@@2 A`<((Printer is not on.' BP2@< A` 6- A" }Rk-- AMOUNT FORMAT--l7 6.=:,6-B:,! @-6-@7 A0v86-@,7&@<&@,4"}.86-, 7&@<&@,4.,6-@W-@@ &&+(@ / =(@I""}T(@W$!"@(@0!$#"@ (@.00#$=(0(%Insert paper. Hit any key"} when ready=)@((Printing page $--HEADINGS--77(@&DATE ITEM AMOU"}NTF8(@'-------- -------------------- -------C(@F$4v+67@<@,.7@<@,S67@"}<@,.7@<@,s67@,.7@<@,v$--INV. CHAR.--AR@'-@@"}6( INVALID!!J-@AN `-@@o( }6-&@AR(1@-"}@%(>:,($--DEL. FOR DATE ENTRY--6-&@ "@6-%@ $56-&@'"@ "})"@56-&@-AR@( -AR .1@-@%(>:,+6-.$p%-@"}@#%( SORTING...z @A`p6-&@6--@6-@-""}#8,!8%@,- @p-"@#8,!8%@,- @ *6-&@*!*+(,A`0"}"@$ @$'6-&@6-@' A`0X--STOP--]G( (-(Do you want to save yo"}ur work?:)@C6.>:,G(b4NAg0YAPl!68,-!68,-n=((To Tape "}or Disk?))@="AUApp 6.>:,( 4TAp0q0DAp"rO(O(DWhat is the name of t"}he file where thedata is stored (e.g. EXPOAK81)s 46. tJ( 7@,7@F:@,&B:,%@;"}J4Ap"uS67@,.,67@<@,.D:I@@S Ap@vg(g(\Position the ta"}pe, press RECORD and PLAY on the recorder, then hit RETURN on the keyboard.x##@@C: A"}@@X(7(+Do you want to look at a different file?D)@M6.>:,U4YX%J* 4N@@"}'+*T Ap(#--Selective Total--<#U-@@"?(%Hit 'M' to mark,'X' to remove a mark.U(Hit" } 'S' to stop.F#70@@@70@@@P#!6-@!ARZ#6-&@%d#>"!}-@ !AR(( 5)@>6.>:,f#0Afg#)6-%@!@!)6-@!h# ""}APj#0Apk#)6-&@ @)6-@l# APn#0MAs# A%+4E,$@"#}x#))7<,4*)8,"B)!AP}#K (*67<,.*!6-&8,3-@%@A() K AP#))"$}7<,4*)8,"B)!AP#K (*67<,.*!6-&8,3-@%@A() K Ac#? 4S% A"%}%+4C,$@? A%+4C,$A#0XA`# A %+4E,$@#))7<,4 )8,"B)"&}!AP#K ( 67<,. !6-%8,3-@%@A() K AP#))7<,4 )8,"B)!AP"'}#K ( 67<,. !6-%8,3-@%@A() K Ac:b%2@AU@@9-@"(}A= _2@b$ D2:INVEST.BASc:b%2@AU@@9-@ H @@PROGPCCCCOLCCLNLSILCC2AWBLTBMAXLIXCURYCURLINECONSOKEMMCNLLDRLLLYBD&*}SINECLSLPPLPDNHLLCCOSECSECSTMSM&+} &,} !"#$%&'&-}()*+,-./01234567&.}89:;<=>?@ABCD6-F:A,&/}&@&A0+<6-AVE6-F:,Q6-Ad]6-B2y(Initializing...MATT*EDIT 14.0 6-A6&0}6-A'6-36-@?6-@K6-@W6-@c6-@o6-@#{6-@76-A6-&1}@6-@6-6-+$;,;,;,;,;@,+6.6K:67,. '67,. 667@,&2}.(!-%A"! 20-%@T"! 0A F:,<` (} ((-A@AA @,&3}(0 E(POKE 842,12:CONTK-]AB@`&F6 (} ((-@@@,(0 6(5P6(POKE 842,&4}12:GOTO 90!-3AB@6&Z7+6-I:,&@;,&6.,6-76-P:',d4 (}@A-B&5}7tA46.n+ A(!6-@+ A0x ( ΠՒ ( DISK MENU &6}( Edit Text ( Load File ( Merge File( Save Text ( Print Text( Custom Set&7}( Quit ( j 6-66-@ A&6-jAAA# A$PA$A&8}(pA6A5p3-@6',2@`@0 3$(Try Again Please--@%-2A&9}@@02A@@@# -20$_ A @(@(G)S"AU_6-@I"#6-&@H# )!A ,&(@  (}&6-6$@,(( O&;}ut of range." A`, AJ 6- APT 6-^ AhU(4( ( ONLY=) &<}8AB:,"G6-K(U Ar6-P:A:,,| *$@,( Out of range (- only).6 AP@ AP&=}(Bad input char(s)$$( #'s only, - valid. AP APAA@d!A=(&>}}ԪԠ֠A(!!($+B:,,##(󠽠&%+B:, ,!@AR(&?}!$( Are you G AA@d+A@( G) "@(6-&@} $ "@x(6- $#( AP# Ap 6.6-1(< To Abort>1(Type text & &A}press :4 6-F:,@"*( }Р4 A- 6-F:,-(- %--(-&> AP)&B} "@'#'&'46.> A0A&A:2 6-&  A`!6-(6.2 A0D (>:&C},6.7<, APN"AU(6-B:,$X7# @2)!A")"@- A`7 APb! (>:,6-&D}%!67<,.>:,lA@v*(( Ϡǡ A`* A !& A@ AP 6-&&E} 6- A0)( Š 6-# A)6-((Š to ??AA A0A@A&F}EAFAG<(Ġ2(< AP(Š AP (Š text &G}TO AP( AP (íԠĠ AP( AP(ˠҠ ((pr&H}ess only for )'6-@ A'!Au# 6-6- A# Ap 4C:6. A &I}+ 6.D67,.=:,"67,.:+67,.- A(*( Working...-$ A6. ɯϠ 467B:,%,.&J}=:F:A,,7'A A* 6.AD46-@ A0>(ˠ H(LIST/PRINT DIRR&K}(LOAD/MERGE DIR\( ERASE FILE f( RENAME FILE p(LOK/UNLOK FILEz(FORMAT A DISK |(&L} MAIN MENU ~(\ 6-66- A 6-\A A APA8pA9A9`&M}AJ 6-6-,(۱ LIST ۲ PRINT DIR ?6 AJA A  B:," A J 6-6-,(۱&N} LOAD ۲ MERGE DIR ?6 AJA A `# 6-6- A # A9 6-((Load Disk DIR into buffer&O}.9B:,"A P)(< will be >) Ae (6. A $ 6-6. A $ A &P}) 6-)(Merge into text buffer." A 6." A 4 6-6- A*6. Ԡ4 A&Q}  6-2( of Š ?"6-, A26-% 6.D67,.=:,%67,.:*.*G +),#(} fo&R}r this DIR)6-3 A96.G"A@67B:,%,.7B:,%,I( A&@*>@&S}P:I(A) 6. A6-$()($- 6.6- A`#6.- A`.! A&T}6-6!6-8;7<@,4 F167@<@,. ; AB 6.7,6.7<, 67,./6.7@,@67&U}@,..O67@,.h67@<@,. n 67@<@,.|L( (V A0`(&V} (j(Apt$  67<@,.$ Ap~.67@ <,.6.$ A`. Ap 6-%!&W}' A@#6-$+&,% 67<%&,.#$ A(( (, "F:A,A6, A&X}( A05  6.+67@<,.7@<,5 A` 6. A`A A(4( ;)>(A$- 6-&*6.Incomp. Load, full-$ 6. ERASE FILE 6-@ 6- A`&Z} (  Ae(A @ =@36.367B:,%,. = A  6.&[}A0 6- A0## !#(> TOGGLE C-SETS(/( Ġ/(Π>& Scroll Up 1 Pg2!!(&\}Ԡ>& Scroll Dn 1 Pg<9$(Ԡ>& Exit to EDIT Menu6@@9(F( Ԡ P( GoTo StartZ&]}( GoTo End d( GoTo LINE n( Delete Lnsx( Insert Lns( Empty BUFF( GoTo Main ( &^}\ 6-66- A 6-\APA`AA0A0A"PA 6- A&_}% 6- A% A0(6-$+&,%(7<%&,0A 6-&!Ap A 6- &`}A0*( Go To 堣6-$ A@*6- A' B:, 6. Ơ' AD 6- A0.(&a} line to Š46-> A@D6-:( line to Š$6-*6-4 AP:6-.($( Lines&b} >  - . Ae"A,6. A6% "67$+&,%,.% A@!!67$+&,%,.7$&c}+&,%%,J6-&&+&,TR6. >'67B:,%,.=:,767B:,%,.-H67B:,%,.=:,R A^<(} &d}LINE(S) B:, 26. < Ah3(Insert Line # #6-- A@36-rH 6-&&(# of to &e}insert ?8((MAX=) B A@H6-| Ae(A+( Working..-%%+6-$+&,%67<%&&f},. -6L6-$+&,%!6-$+%&,%967<%&,.7<%&,H67<%&,.L U 6-%6.=:,:67B:&g},%,. Lines before K67B:,%,.=:,U AA)AR6-%@"#!)6- (}&h}Af B:, 6- A 6--6-$+&,% -(7<%&,6-% =Af&i}AR!-7(LINE #  =6-7-@+(EDIT MODE 7AR 1-"(&j}>:,>:@0,6-"6-& "(0- A@F:,AU#)- A:F:,"A@D*F:,@&k}*  A`* A@N"F:,"@6-" A pX"F:,"@6-" A pb F:,"6- A pl&l}3"A%)+"@'*",) A`3 A@n@'Ap" F:,"AV" A@r" F:,"AV&m}" A@vAWA@! 6-F:,6-F:,!AR/-@"(>:AV,)AR/-B (>&n}:,0+"@1)"@0,*F:,!@88(>:,B A@4"+"@()"@),*F:,"*(>:,4 A@F:,"*&o}AVA ! 6-F:,6-F:,!AR3"AV-@")(>:AW,3 A ;"*"AU6-&p}@"%6-1@"; A p - (LINE # % 0AR1-0(>:,>:@0, 6-F:&q}, @8A `"@"6- A p/ @"6-%%(>:AU,/ A ` 1(>:,>:@0&r},  A@! 6-F:,6-F:,!AR 4-@,(READING PAGE 41* , A@&s}4 -6-$+&%,%> -H+AB@+AB@RB:,"A!P\67B:,%,.7B:,%,&t}f67<%&,. p 6-%!6-z "6-& A A" 6-%!6-& A &u}A"@ 6-& 6- A 96.** Last line read >>/67B:,%,.=:,9 A&6.Empt&v}y Ơנ *& A0!!( text from BUFF AeA# A+ 6.6-!6. &w}+ A $ A6. Ġ 6- A`6- 6.$ A$.  B:,"A#p&x}8 67B:,%,.7B:,%,B  6-%! A$@L 67$+&,%<$+&,%,.V A#P` j F:A,"A6&y}A$0t A~ 6.ĭ A 7'6.Ơ쬠-6-7 A Ax 6&z}. Š  6- A` A#@ B:,A% 6. Ơ A 6. 0@&{}@2&6-@0 A0 (Šՠ  ( As Text File  (As PRINT Stmnts (As DATA Stmnt&|}s  ( Main Menu  ( 6-66- A 6-  " A( L*(" bl&}}ank lines from buffer<( During SAVE F ApL6-2 A&A& A&P< <#(File # for PRINT statements<(&~}(i.e. 6 for '? #6;')F (P # 6- A06-# A&`Z (Write DATA Statementsd 7(S&}tarting 堣 '6-B'g&1 A076-n =6-P:+B'g&,',-(Line 7 A@=6-x A 6-6. &}Š%6-@16-@; A`A6- - ,6-$+&,%"7<%&,4*, A(@ "A'  (&}6-% &A'@A'p ( ? (A'` (#; (>:@4, A' (&} DATA  6.7<%&, 6-?::@4, (  " B&}6.!167B:,%,. 堣>B67B:,%,.=:,,  2 A%6  B:,  A$@  6.&}@2J  6-@ A0T (ԠӒ ^ ( 40 Char Lines h (Newspaper ۲ Colr &}(Newspaper ۳ Col| ( Return to Main  ( 6-66- A 6- "A&} ^@(( for Printout46-@0> AD6.K0^67B:,%,. PG  6&(} text as it is &}printed:0 Ap66-  "6- A0  =6-@ $-(Left (max=)7 A@=6- !(!(Vert&}ical line spacing: ""( Single (screen format) ( Double ( 6- A ! "6-@!6-@&} ! "6-@!6-@H  "6- A0 (* CHARACTER SET SELECT * ( USE ATARI SET 0(&} USE CUSTOM SET0( FROM FILE  ( 6- A6-& (Get  (And Press key&} (< to abort>& ( A)("AUA100 5"@'%6.Ԡ+5 A:  A$ &}? AVD  6-6-&@N ,@P:,(A>:,OX !A2pb 6-@:K,&} A4`l -v 96-$+&,6.7%<%,$4/(@9 A2@ (+,A20 06-?: A5H  R (6-&A4@\ 6-&}%+&,$!A4@f A5Pp  6-%!A2`z A2  6.=:,6-% $ 4-( !6&}-$$ K( A5`6-B:,% A5@86-?::@',>:,>:,>:,U$ H&}-%+"@,( +(A;(A>:,E A4H$ & 6- A5@#6-?: % A,)8"@'>6-H A @E 6.D67,.=:,(67@,.:;AT&}E AOO104,240,10,201,2,240,7,170,104,104,202,208,251,96,104,133,213,104,133,212OO104,104,133,216,160&},0,177,212,230,212,208,2,230,213,160,0,132,217,201,128LL144,4,41,127,198,217,170,133,218,224,96,176,11,169,64,224,32,144,&}2,169LL224,24,101,218,133,214,169,0,133,215,162,3,6,214,38,215,202,208,249,24MM173,244,2,101,215,133,215,160,0,240,2,&}208,187,162,0,177,214,230,214,208JJ2,230,215,69,217,149,228,232,224,8,208,239,162,0,22,228,42,232,224,8MM208,248,153,&}220,0,200,192,8,208,238,162,0,181,220,201,155,208,4,169,151LL149,220,232,224,8,208,241,162,112,169,11,157,66,3,169,220,15&}7,68,3,169DD0,157,69,3,169,0,157,73,3,169,8,157,72,3,32,86,228,198,216,208 166,96MM104,240,10,201,2,240,15,170,1&}04,104,202,208,251,169,0,133,212,169,1,133QQ213,96,104,133,215,104,133,214,104,104,168,136,177,214,201,32,208,9,136,208&};;247,177,214,201,32,240,1,200,132,212,169,0,133,213,96 D:RATEDIT.BAS iiiiiiiiiiiiii&}iiiiiiiii77,214,201,32,240,1,200,132,212,169,0,133,213,96 D:RATEDIT.BAS iiiiiiiiiiiiii$